1 POKE56576,199:POKE53272,21:POKE53265,155:POKE53270,200
35 :
40 :
45 POKE53265,PEEK(53265)AND239
50 POKE53280, 5:POKE53281,11:PRINT"[147]";CHR$(142);
55 PRINT"[152]ESTTRAILWESTTRAILWESTTRAILWESTT"
60 PRINT"ILWESTTRA[154]o[183][183][183][183][183][183][183][183][183][183][183][183][183]p[152]ESTTRAILWE"
65 PRINT"TRAILWES[144]T[146][154][180][153]TRAILWEST[154][167][152]ILWESTTRAI"
70 PRINT"WESTTRAIL[144] [146][154]l[175][175][175][175][175][175][175][175][175][175][175][175][175][186][152]TRAILWEST"
75 PRINT"AILWESTT[144]RAIL WEST TRAIL[146][152]WESTTRAILW"
80 PRINT"TTRAILWESTTRAILWESTTRAILWESTTRA"
85 PRINT"WESTT[154]o[183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]p[152]AILWEST"
90 PRINT"RAILW[144]E[146][154][180][167][152]TTRAIL"
95 PRINT"STTRA[144]I[146][154][180]1[155])[153]PLAYGAME[154][167][152]WESTTR"
100 PRINT"[160]LWEST[144] [146][154][180][167][152]RAILWES"
105 PRINT"TRAIL[144]W[146][154][180]2[155])[153]READINSTRUCTIONS[154][167][152]STTRAIL"
110 PRINT"ESTTR[144]A[146][154][180][167][152]LWESTT"
115 PRINT"ILWES[144]T[146][154][180]Q[155])[153]QUITTO[150]LOADSTAR[154][167][152]TRAILWE"
120 PRINT"TRAIL[144] [146][154][180][167][152]ESTTRAI"
125 PRINT"WESTT[144]R[146][154]l[175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][186][152]ILWEST"
130 PRINT"AILWE[144]ST TRAIL WEST TRAIL WES[146][152]TTRAILW"
135 PRINT"TTRAILWESTTRAILWESTTRAILWESTTRA"
140 PRINT"WESTTRAILWESTTRAILWESTTRAILWEST"
145 PRINT"RAILWE[154]o[183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]p[152]TTRAIL"
150 PRINT"STTRA[144]I[146][154][180][153]PLEASEENTERCHOICE[154][170][152]WESTTR"
155 PRINT"LWEST[144] [146][154]l[175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][186][152]RAILWES"
160 PRINT"TRAIL[144]WEST TRAIL WEST TRAIL W[146][152]ESTTRAIL"
165 PRINT"ESTTRAILWESTTRAILWESTTRAILWESTT"
170 POKE53265,PEEK(53265)OR16
175 GETA$:IFA$=""THEN175
180 IFA$="1"THEN250
185 IFA$="2"THEN220
190 IFA$="Q"THEN200
195 GOTO 175
200 OPEN15,8,15,"R0:HELLO CONNECT=HELLO CONNECT":INPUT#15,ER,ER$:CLOSE15
205 IF ER<>63 THEN PRINT"[147]":END
210 LOAD "HELLO CONNECT",8,1
215 NF$="TW.GAME":GOTO225
220 NF$="TW.INST"
225 POKE53280,5:POKE53281,11
226 PRINT"[147][208]LEASE WAIT WHILE LOADING..."
230 PRINT"[151]LOAD"CHR$(34)NF$CHR$(34)",8,1"
235 PRINT"RUN"
240 POKE631,ASC(""):POKE632,13:POKE633,13:POKE198,3
245 END
250 POKE53280, 0:POKE53281, 0:PRINT"[147]";
255 PRINT"notice"
260 PRINT"[152][163][163][163][163][163][163][163][163][163][163][163]"
265 PRINT"[154]oNCE[153]trailwest[154]ISLOADEDYOU"
270 PRINT"WILLHAVETOREBOOTTORETURNTO"
275 PRINT"THE[158]loadstar[154]OPERATINGSYSTEM."
280 PRINT"[152]---"
285 PRINT"[154]dOYOUWISHTOLOAD[153]trailwest[154]?"
290 PRINT"[197]NTER[217][152])[154]ESOR[206][152])[154]O."
295 GETA$:IFA$=""THEN 295
300 IFA$="Y"ORA$="[217]" THEN 215
305 IFA$="N"ORA$="[206]" THEN 45
310 GOTO 295
415 PRINT"zzzzzzzzzzzzzzzzzzzzzzzzzzzzzz"
425 PRINT"[160]z[153] PRESS SPACE TO CONTINUE. [146]z"